﻿' ******************************************************************************
' ** 
' **  Yahoo! Managed
' **  Written by Marius Häusler 2011
' **  It would be pleasant, if you contact me when you are using this code.
' **  Contact: YahooFinanceManaged@gmail.com
' **  Project Home: http://code.google.com/p/yahoo-finance-managed/
' **  
' ******************************************************************************
' **  
' **  Copyright 2011 Marius Häusler
' **  
' **  Licensed under the Apache License, Version 2.0 (the "License");
' **  you may not use this file except in compliance with the License.
' **  You may obtain a copy of the License at
' **  
' **    http://www.apache.org/licenses/LICENSE-2.0
' **  
' **  Unless required by applicable law or agreed to in writing, software
' **  distributed under the License is distributed on an "AS IS" BASIS,
' **  WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
' **  See the License for the specific language governing permissions and
' **  limitations under the License.
' ** 
' ******************************************************************************


Namespace YahooManaged.Search


    Public Class SearchResult
        Private mTitle, mAbstract As String
        Private mUrl, mClickUrl As Uri
        Public ReadOnly Property Title() As String
            Get
                Return mTitle
            End Get
        End Property
        Public ReadOnly Property Abstract() As String
            Get
                Return mAbstract
            End Get
        End Property
        Public ReadOnly Property Url() As Uri
            Get
                Return mUrl
            End Get
        End Property
        Public ReadOnly Property ClickUrl() As Uri
            Get
                Return mClickUrl
            End Get
        End Property

        Friend Sub New(ByVal title As String, ByVal abstract As String, ByVal url As Uri, ByVal clkUrl As Uri)
            mTitle = title
            mAbstract = abstract
            mUrl = url
            mClickUrl = clkUrl
        End Sub
    End Class

End Namespace